home *** CD-ROM | disk | FTP | other *** search
- @ECHO OFF
-
- REM
- REM THIS 4DOS BATCH FILE WILL USE LHA or LHARC to decompress previously
- REM compressed .SWG files and restore them to their uncompressed
- REM state. Use SWAGCOMP.EXE to compress these again.
- REM To use LHARC, change the lines that refere to LHA.
-
- REM Usage : UNCOMPRESS \filepath\
-
- REM If no filepath is given then files in the CURRENT directory will
- REM be processed
-
- CLS
- IF "%1" == "?" GOTO syntax
- IF "%1" == "" GOTO compile
- ECHO Decompressing SWAG files %1
- FOR %%X IN (%1*.SWG) DO LHA e %%X
- DEL *.SWG
- FOR %%X IN (%1*.___) DO RENAME %%X %@NAME[%%X].SWG
- GOTO end
-
- :compile
- ECHO Executing TPC for files Matching *.PAS
- FOR %%X IN (*.SWG) DO LHA e %%X
- DEL *.SWG
- FOR %%X IN (*.___) DO RENAME %%X %@NAME[%%X].SWG
- GOTO end
-
- :syntax
- ECHO SYNTAX: UNCOMPRESS \filepath\
-
- :end
-